home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Turnbull China Bikeride
/
Turnbull China Bikeride - Disc 2.iso
/
STUTTGART
/
PROBLEMS
/
BENCHMARK
/
BUBBLESORT
/
bubbletest
/
AnsiC_2
/
!run
next >
Wrap
Text File
|
1992-06-28
|
324b
|
10 lines
set bubble_c$dir <obey$dir>
set bubbletest$dir <obey$dir>.^
if "<time1>" = "" then run <bubbletest$dir>.Time1
*<bubble_c$dir>.program { > <bubble_c$dir>.output }
set bubbletest$dir <obey$dir>.^
<bubbletest$dir>.prove2 <bubble_c$dir>.output { > <bubble_c$dir>.time }
settype <bubble_c$dir>.time text
run <bubble_c$dir>.time